home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d3 / db4less3.arc / SCANDEMO.PRG < prev    next >
Text File  |  1990-06-16  |  109b  |  5 lines
  1. USE EMP IN 1
  2. SCAN FOR AT('DBASE',COMMENTS)>0 
  3.  ? LNAME,SUBSTR(COMMENTS,AT('DBASE',COMMENTS),25)
  4. ENDSCAN
  5.